home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Swedish (S-1.2.2) / Buntar / Version 1.2 nyheter / card_2092.txt < prev    next >
Text File  |  1989-01-05  |  1KB  |  69 lines
  1. -- card: 2092 from stack: in.2 nyheter
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 5683
  5. -- name: foundText
  6.  
  7.  
  8. -- part contents for background part 9
  9. ----- text -----
  10. Nya HyperTalk-funktioner
  11. Kort 5 av 10
  12.  
  13. -- part contents for background part 7
  14. ----- text -----
  15. foundText
  16.  
  17. -- part contents for background part 11
  18. ----- text -----
  19. foundText l√§mnar tecknen inramade i rutan n√§r det senaste kommandot ‚ÄùS√∂k‚Äù hittat det s√∂kta. Hittades inget, avges den tomma str√§ngen.
  20.  
  21.  
  22. -- part contents for background part 8
  23. ----- text -----
  24. the foundText
  25.  
  26.  
  27.  
  28.  
  29.  
  30. -- part contents for background part 10
  31. ----- text -----
  32. inga
  33.  
  34. -- part contents for background part 17
  35. ----- text -----
  36. --n√§r f√∂ljande kommandon utf√∂rts
  37. find "Jo"
  38. put the foundText
  39.  
  40. --kan du ev. se f√∂ljande resultat:
  41. Jonas
  42.  
  43. --anv√§nd foundText f√∂r villkorlig behandling:
  44. find "Sv" in field "efternamn"
  45. if the foundText is "Svensson" then
  46.    multiply arbetadeTimmar by 25
  47. else
  48.    multiply arbetadeTimmar by 20
  49. end if
  50.  
  51.  
  52. -- part contents for background part 18
  53. ----- text -----
  54. on foundTextDemo
  55.  
  56. --visa funnen text
  57.  
  58.    find "Hyper"
  59.    put the foundText
  60.    wait 4 seconds
  61.    cleanExit -- i denna bakgrunds manus
  62. end foundTextDemo
  63.  
  64. -- part contents for background part 31
  65. ----- text -----
  66. Sök
  67. foundChunk
  68. foundField
  69. foundLine